home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…ry 5: (Reseller Edition) / Apple Reference & Presentations Library 5.0 (Reseller Edition).iso / 5-Fonts & Software / HyperCard 1.2.5 / Help Stacks / Help / card_15515.txt < prev    next >
Text File  |  1987-11-25  |  2KB  |  87 lines
  1. -- card: 15515 from stack: in
  2. -- bmap block id: 7794
  3. -- flags: 0000
  4. -- background id: 31363
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on newButton
  8.   put  "Very good!  I‚Äôll delete it, if you don‚Äôt mind." into prompt
  9.   answer prompt with  "OK" or "Cancel"
  10.   if it = "OK" then doMenu "clear button"
  11. end newButton
  12.  
  13.  
  14.  
  15. -- part 1 (button)
  16. -- low flags: 00
  17. -- high flags: 0001
  18. -- rect: left=254 top=291 right=314 bottom=282
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 1
  22. -- font id: 0
  23. -- text size: 12
  24. -- style flags: 0
  25. -- line height: 16
  26. -- part name: 
  27.  
  28.  
  29. -- part 2 (button)
  30. -- low flags: 00
  31. -- high flags: 0000
  32. -- rect: left=20 top=209 right=237 bottom=56
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 1009 / 1009
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: Eye
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   play harpsichord tempo 400 "f g ab g abw"
  44.   visual effect iris close to gray
  45.   visual effect iris open
  46.   go to this card
  47. end mouseUp
  48.  
  49.  
  50. -- part 15 (button)
  51. -- low flags: 00
  52. -- high flags: 0000
  53. -- rect: left=21 top=106 right=161 bottom=119
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: 
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   setCrossReference
  65.   go to card id 25491
  66. end mouseUp
  67.  
  68.  
  69.  
  70. -- part contents for background part 14
  71. ----- text -----
  72. ‚Ä¢ Choose Paste Button from the Edit menu.
  73.  
  74. The button is pasted onto the card or background and appears selected.  Change its style if you want by choosing Button Info from the Objects menu or by double-clicking the button.  
  75.  
  76. You can also copy a button onto the same card by Option-dragging it.  Use the Shift key to constrain the copy to the same horizontal or vertical planes as the original.
  77.  
  78.  
  79.  
  80.  
  81. -- part contents for background part 15
  82. ----- text -----
  83. Copying a button (cont.)
  84.  
  85. -- part contents for background part 13
  86. ----- text -----
  87. 191,168